home *** CD-ROM | disk | FTP | other *** search
/ Remax Data / Remax Porfolio Data 15 Jul 1994 CD-ROM.ISO / fp26_rmx / mketbl.prg < prev    next >
Encoding:
Text File  |  1994-07-10  |  1.7 KB  |  40 lines
  1.  
  2.  
  3. CLOSE ALL
  4.  
  5. ERASE Roster.dbf
  6. CREATE TABLE Roster ;
  7.     (Region N(2), Office N(3), Asoc_Num N(3), Unique N(12), Name C(30), ;
  8.     Last C(20), First C(20), Middle C(10), Nickname C(20), Title C(2),    ;
  9.     Posistion C(30), Spec1 C(3), ;
  10.     Spec2 C(3), Lang1 C(20), Lang2 C(20), Lang3 C(20), License N(4), ;
  11.     Join N(4), Sales N(6), Desig1 C(6), Desig2 C(6), Desig3 C(6), ;
  12.     Desig4 C(6), Desig5 C(6), Desig6 C(6), Club C(4), ROF C(12), ;
  13.     Comm1 C(40), Comm2 C(40), Comm3 C(40), Comm4 C(40), Comm5 C(40), ;
  14.     OffName C(30), OffAdd1 C(30), OffAdd2 C(30), City C(17), ;
  15.     State C(2), Zip C(10), Country C(20), Phone1 C(12), Phone2 C(12), ;
  16.     Phone3 C(12), Phone4 C(12), FAX C(12), Picture C(1), Service1 C(20), Service2 C(20), ;
  17.     Service3 C(20), Service4 C(20), Open N(6), ADI C(20), Page C(4), ;
  18.     Coor C(2), OffType N(2), CityOver C(17), RosterSta C(30), Rams C(15), ;
  19.     Achiev C(20), COMPUSERV C(17), Bio C(8), RecNo N(6))
  20.  
  21. SELECT Roster
  22. APPEND FROM rmxdta.txt TYPE DELIMITED
  23.  
  24.  
  25. ERASE BioInfo.dbf
  26. CREATE TABLE BioInfo ;
  27.     (Unique N(12), Direct C(12), HomePhone C(12), AgntFax C(12), AgntPager C(12), ;
  28.     AgntMobile C(12), CIVIC1 C(30), CIVIC2 C(30), CIVIC3 C(30), HOBBY1 C(30), ;
  29.     HOBBY2 C(30), HOBBY3 C(30), MEMBER1 C(4), MEMBER2 C(4), MEMBER3 C(4), ;
  30.     Service1 C(20), Service2 C(20), Service3 C(20), Service4 C(20), Service5 C(20), ;
  31.     Education C(15), Desig1 C(10), Desig2 C(10), Desig3 C(10), Career C(40), ;
  32.     Price_fr N(12), Price_to N(12), Pref C(1), Referal1 C(1), Referal2 C(1), ;
  33.     Referal3 C(1), Referal4 C(1), ERCPaper C(1), Welcomekit C(1), Relocations N(5), ;
  34.     Picture C(1), EntryDate N(6), BioSubs N(10), Pictureat C(12), Info M)
  35.     
  36. SELECT BioInfo
  37. APPEND FROM bioinfo.txt TYPE DELIMITED
  38.  
  39. CLOSE DATABASES
  40.